home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d14 / demdat.arc / REPDEM.SBP < prev    next >
Encoding:
Text File  |  1990-06-01  |  2.9 KB  |  79 lines
  1. SBP
  2.   ╜  REPDEM
  3.   ╜  You can use the Maximize
  4.   ╜  up arrow to bring the program 
  5.   ╜  editor window to full screen
  6.   ╜  size, and the vertical scroll
  7.   ╜  bar to view the entire program.
  8.  
  9.   ╜  With the exceptions noted below, the following DML program code 
  10.   ╜  is generated automatically when you save the report form described 
  11.   ╜  in the Form Designer section of the Trial Pack booklet. The 
  12.   ╜  exceptions are the addition of these REM statements, the addition 
  13.   ╜  of the NUMBASE command, and the removal of the path from the 
  14.   ╜  filename in the OPEN FILE command.
  15.  
  16.   ▓"z-,9999999.00"
  17.  
  18.   ╜  The ? command prints numeric values according to the format
  19.   ╜  specified in the NUMBASE command. NUMBASE may be re-set by other 
  20.   ╜  programs or using the Set Number Format menu option. It is set here 
  21.   ╜  to the format required for printing the values in this report.
  22.  
  23.   ┤ Ö"CLIENTS"
  24.  
  25.   ╜  By default, the Report Generator inserts a full pathname into the
  26.   ╜  OPEN FILE command. In the Trial Pack reports, this has been edited
  27.   ╜  out, so that the OPEN FILE commands always refer to files in the 
  28.   ╜  current directory.
  29.  
  30.   ┬"Report to Printer?","",134,a%
  31.  
  32.   ╜  This is a REQUEST type 134. It displays a Windows-style ? dialog
  33.   ╜  with three options, Yes, No and Cancel. The default option in type 
  34.   ╜  134 is No. The variable a% returns the following values: 
  35.   ╜  Yes = 1, No = 2, Cancel = 0.
  36.  
  37.   ía% 0 p Æ ^ ía% 1 p ╣;
  38.  
  39.   ╜  If the response to the dialog is Cancel, this statement terminates 
  40.   ╜  the program. If the response is Yes, then it executes a PRINT ;
  41.   ╜  which re-directs output to the printer. Otherwise output remains
  42.   ╜  directed to the display.
  43.  
  44.   ┴Net_Due.CLIENTS
  45.  
  46.   ╜  This line specifies the fields on which report functions will 
  47.   ╜  operate for the report as a whole, in this case Net_Due.
  48.  
  49.   } ┴
  50.   {
  51.   {@1;"Total Due:";@61;&15 lNet_Due.CLIENTS
  52.   {
  53.   Æ ┴
  54.  
  55.   ╜  The AFTER REPORT marks the start of the AFTER REPORT section. This
  56.   ╜  includes a ? blank line before and after the report SUM for the
  57.   ╜  Net_Due. This SUM is printed starting at print position 61 for
  58.   ╜  a length of up to 15 characters, preceded by some text at print
  59.   ╜  position 1. END REPORT marks the end of an AFTER REPORT or BEFORE
  60.   ╜  REPORT section.
  61.  
  62.   ƒ
  63.   {@30;"Amounts Due Report"
  64.   {
  65.   Æ ƒ
  66.  
  67.   ╜  The HEADING command marks the sart of a HEADING section. This prints
  68.   ╜  the text "Amounts Due Report" starting at print position 30, followed
  69.   ╜  by a ? blank line. END HEADING marks the end of this section. 
  70.  
  71.   ╔@1;&29Client.CLIENTS;@31;&29Location.CLIENTS;@61;&13Net_Due.CLIENTS
  72.  
  73.   ╜  The SELECT command is used to define the DML equivalent of the 
  74.   ╜  Fields section of a Query. In this SELECT command you can see the 
  75.   ╜  three fields you positioned in the Report Generator SELECT band,
  76.   ╜  each with its @ start position and & length.
  77.  
  78.  
  79.